home *** CD-ROM | disk | FTP | other *** search
/ PC World 2003 January / PCWorld_2003-01_cd.bin / Software / Vyzkuste / rychlokurz / httrack.exe / {app} / src / htsnostatic.c < prev    next >
C/C++ Source or Header  |  2002-11-17  |  6KB  |  262 lines
  1. /* ------------------------------------------------------------ */
  2. /*
  3. HTTrack Website Copier, Offline Browser for Windows and Unix
  4. Copyright (C) Xavier Roche and other contributors
  5.  
  6. This program is free software; you can redistribute it and/or
  7. modify it under the terms of the GNU General Public License
  8. as published by the Free Software Foundation; either version 2
  9. of the License, or any later version.
  10.  
  11. This program is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with this program; if not, write to the Free Software
  18. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19.  
  20.  
  21. Important notes:
  22.  
  23. - We hereby ask people using this source NOT to use it in purpose of grabbing
  24. emails addresses, or collecting any other private information on persons.
  25. This would disgrace our work, and spoil the many hours we spent on it.
  26.  
  27.  
  28. Please visit our Website: http://www.httrack.com
  29. */
  30.  
  31.  
  32. /* ------------------------------------------------------------ */
  33. /* File: htsnostatic.c subroutines:                             */
  34. /*       thread-safe routines for reentrancy                    */
  35. /* Author: Xavier Roche                                         */
  36. /* ------------------------------------------------------------ */
  37.  
  38. #include "htsnostatic.h"
  39.  
  40. #include "htsbase.h"
  41. #include "htshash.h"
  42. #include "htsinthash.h"
  43.  
  44. typedef struct {
  45.   /*
  46.   inthash values;
  47.   */
  48.   inthash blocks;
  49. } hts_varhash;
  50.  
  51. #if USE_BEGINTHREAD
  52. static PTHREAD_LOCK_TYPE hts_static_Mutex;
  53. #endif
  54. static int hts_static_Mutex_init=0;
  55. #if HTS_WIN
  56. #else
  57. static PTHREAD_KEY_TYPE hts_static_key;
  58. #endif
  59.  
  60. int hts_initvar() {
  61.   if (!hts_static_Mutex_init) {
  62.     /* Init done */
  63.     hts_static_Mutex_init=1;
  64. #if USE_BEGINTHREAD
  65.     /* Init mutex */
  66.     htsSetLock(&hts_static_Mutex, -999);
  67.     
  68. #if HTS_WIN
  69. #else
  70.     /* Init hash */
  71.     PTHREAD_KEY_CREATE(&hts_static_key, hts_destroyvar);
  72. #endif
  73. #endif
  74.   }
  75.  
  76.   /* Set specific thread value */
  77. #if USE_BEGINTHREAD
  78. #if HTS_WIN
  79. #else
  80.   {
  81.     void* thread_val;
  82.     hts_varhash* hts_static_hash = (hts_varhash*) malloc(sizeof(hts_static_hash));
  83.     if (!hts_static_hash)
  84.       return 0;
  85.       /*
  86.       hts_static_hash->values = inthash_new(HTS_VAR_MAIN_HASH);
  87.       if (!hts_static_hash->values)
  88.       return 0;
  89.     */
  90.     hts_static_hash->blocks = inthash_new(HTS_VAR_MAIN_HASH);
  91.     if (!hts_static_hash->blocks)
  92.       return 0;
  93.     /* inthash_value_is_malloc(hts_static_hash->values, 0);  */ /* Regular values */
  94.     inthash_value_is_malloc(hts_static_hash->blocks, 1);     /* We'll have to free them upon term! */
  95.     inthash_value_set_free_handler(hts_static_hash->blocks, hts_destroyvar_key);  /* free handler */
  96.     thread_val = (void*) hts_static_hash;
  97.     
  98.     PTHREAD_KEY_SET(hts_static_key, thread_val, inthash);
  99.   }
  100. #endif
  101. #endif
  102.  
  103.   return 1;
  104. }
  105.  
  106. /*
  107.   hash table free handler to free all keys
  108. */
  109. void hts_destroyvar_key(void* adr) {
  110. #if HTS_WIN
  111. #else
  112.   hts_NostaticComplexKey* cKey = (hts_NostaticComplexKey*) adr;
  113.   if (cKey) {
  114.     void* block_address = NULL;
  115.     PTHREAD_KEY_GET(cKey->localKey, &block_address, void*);
  116.     /* Free block */
  117.     if (block_address) {
  118.       free(block_address);
  119.     }
  120.     cKey->localInit = 0;
  121.   }
  122. #endif
  123. }
  124.  
  125. void hts_destroyvar(void* ptrkey) {
  126. #if HTS_WIN
  127. #else
  128.   if (ptrkey) {
  129.     hts_varhash* hashtables = (hts_varhash*) ptrkey;
  130.     PTHREAD_KEY_SET(hts_static_key, NULL, inthash);  /* unregister */
  131.  
  132.     /* Destroy has table */
  133.     inthash_delete(&(hashtables->blocks));  /* will magically call hts_destroyvar_key(), too */
  134.     /*
  135.     inthash_delete(&(hashtables->values));
  136.     */
  137.     free(ptrkey);
  138.   }
  139. #endif
  140. }
  141.  
  142. /*
  143.   destroy all key values (for the current thread)
  144. */
  145. int hts_freevar() {
  146. #if HTS_WIN
  147. #if 0
  148.   void* thread_val = NULL;
  149.   PTHREAD_KEY_GET(hts_static_key, &thread_val, inthash);
  150.   hts_destroyvar(thread_val);
  151.   PTHREAD_KEY_SET(hts_static_key, NULL, inthash);  /* unregister */
  152.   /*
  153.   PTHREAD_KEY_DELETE(hts_static_key); NO
  154.   */
  155. #endif
  156. #endif
  157.   return 1;
  158. }
  159.  
  160. HTSEXT_API int hts_resetvar() {
  161.   int r;
  162.   hts_lockvar();
  163.   {
  164.     hts_freevar();
  165.     r = hts_initvar();
  166.   }
  167.   hts_unlockvar();
  168.   return r;
  169. }
  170.  
  171. int hts_maylockvar() {
  172.   return hts_static_Mutex_init;
  173. }
  174.  
  175. int hts_lockvar() {
  176. #if USE_BEGINTHREAD
  177.   htsSetLock(&hts_static_Mutex, 1);
  178. #endif
  179.   return 1;
  180. }
  181.  
  182. int hts_unlockvar() {
  183. #if USE_BEGINTHREAD
  184.   htsSetLock(&hts_static_Mutex, 0);
  185. #endif
  186.   return 1;
  187. }
  188.  
  189. int hts_setvar(char* name, long int value) {
  190.   return hts_setextvar(name, (long int)value, 0);
  191. }
  192.  
  193. int hts_setblkvar(char* name, void* value) {
  194.   return hts_setextvar(name, (long int)value, 1);
  195. }
  196.  
  197. int hts_setextvar(char* name, long int value, int flag) {
  198. #if HTS_WIN
  199. #else
  200.   void* thread_val = NULL;
  201.   hts_varhash* hashtables;
  202.   
  203.   /*
  204.   hts_lockvar();   // NO - MUST be protected by caller
  205.   {
  206.   */
  207.   PTHREAD_KEY_GET(hts_static_key, &thread_val, inthash);
  208.   hashtables = (hts_varhash*) thread_val;
  209.   if (hashtables) { // XXc XXC hack for win version
  210.     inthash_write(hashtables->blocks, name, value);
  211.   }
  212. #endif
  213.   
  214.   return 1;
  215. }
  216.  
  217.  
  218. int hts_getvar(char* name, long int* ptrvalue) {
  219.   return hts_getextvar(name, (long int*)ptrvalue, 0);
  220. }
  221.  
  222. int hts_getblkvar(char* name, void** ptrvalue) {
  223.   return hts_getextvar(name, (long int*)ptrvalue, 1);
  224. }
  225.  
  226. int hts_getextvar(char* name, long int* ptrvalue, int flag) {
  227. #if HTS_WIN
  228. #else
  229.   void* thread_val = NULL;
  230.   hts_varhash* hashtables;
  231.   
  232.   hts_lockvar();
  233.   {
  234.     PTHREAD_KEY_GET(hts_static_key, &thread_val, inthash);
  235.     hashtables = (hts_varhash*) thread_val;
  236.     /*  if (flag) {
  237.     */
  238.     inthash_read(hashtables->blocks, name, ptrvalue);
  239.     /*
  240.     } else {
  241.     inthash_read(hashtables->values, name, ptrvalue);
  242.     }
  243.     */
  244.   }
  245.   hts_unlockvar();
  246. #endif
  247.   
  248.   return 1;
  249. }
  250.  
  251. long int hts_directgetvar(char* name) {
  252.   long int value=0;
  253.   hts_getvar(name, &value);
  254.   return value;
  255. }
  256.  
  257. void* hts_directgetblkvar(char* name) {
  258.   void* value=NULL;
  259.   hts_getblkvar(name, &value);
  260.   return value;
  261. }
  262.